(setup-korean-environment): Delete

a code setting default value of default-input-method.

diff --git a/lisp/language/korean.el b/lisp/language/korean.el
index 5be514ab2209c19383730fd8b7db0415efb543ec..c410b8bd4380e409f78fbfb8ac017a32814596aa 100644 (file)
--- a/lisp/language/korean.el
+++ b/lisp/language/korean.el
@@ -59,8 +59,7 @@
 
   (set-default-coding-systems 'korean-iso-8bit)
 
-  (setq default-input-method "korean-hangul")
-  (setq-default default-input-method "korean-hangul"))
+  (setq default-input-method "korean-hangul"))
 
 (set-language-info-alist
  "Korean" '((setup-function . setup-korean-environment)